;;;QQ:67762207
[@]
{
#IF
Isadmin
#ACT
mov A5 ""
mov A6 ""
mov A1 ""
mov A2 ""
goto @1

[@1]
#SAY
<Ҫĵͼ/@@ͼ>  <$/@Input$>\
ͼ<$OUTPUT(A5)>\\

ĬΪȫ\
<ҪĹ/@@ss>\
<$OUTPUT(A6)>\\

</@>\
<Ƿй/@>\\
============================================\\
<Ʒ/@@clearmap> ĬԼͼ


[@]
#IF
EQUAL A5 ""
#ACT
mov A5 %USERMAP

#IF
checkmonmap "%A5" 1 %A6
#ACT
sysmsg "<$OUTPUT(A5)><$OUTPUT(A6)>"
#ELSEACT
sysmsg "<$OUTPUT(A5)><$OUTPUT(A6)>"


[@Input$]
#ACT
mov A2 "$"
addstr A2 %A5
mov A5 %A2
goto @1


[@]
#IF
!EQUAL A6 ""
#ACT
monclear %A5 %A6
sysmsg "<$OUTPUT(A5)>ͼϵĹ<$OUTPUT(A6)>ȫ"
#ELSEACT
monclear %A5
sysmsg "<$OUTPUT(A5)>ͼϵĹȫ"


[@@ͼ]
#ACT
mov A5 %Inputstr
goto @1


[@@ss]
#ACT
mov A6 %Inputstr
goto @1


[@@clearmap]
#IF
#ACT
MOV A0 %INPUTSTR
#IF
EQUAL A0 ""
#ACT
MOV A0 %USERMAP
ADDSTR A0 ",300,300,900"
ClearItemMap %A0  *
SYSMSG "<$OUTPUT(A0)>"
#ELSEACT
ADDSTR A0 ",300,300,900"
ClearItemMap %A0  *
SYSMSG "<$OUTPUT(A0)>"


}
;;;QQ:67762207